DIDATTICA SOFTWARE 

I trucchi del mestiere 


ACCORGIMENTI CHE POSSONO MIGLIORARE LE PRESTAZIONI DEI 
PROGRAMMI PER SPECTRUM E CHE PROTEGGONO DA OCCHI INDISCRETI 

i LISTATI CARICATI IN MEMORIA. 

di P, TODOROVICH e C. ERMACORA 


P ossedere un computer e sapere qualche nozione 
di Basic non vuoi dire conoscere completamen¬ 
te la propria macchina. 

A tutti 1 possessori di un computer sarà capitato 
di scoprire, a distanza di mesi dalTaequisto, fun¬ 
zioni e possibilità non menzionate dal manuale d'u¬ 


so, ma ugualmente utili ed interessanti. Ebbene, 
dopo d corso Basic presentato qualche tempo ad¬ 
dietro, eccoci nuovamente alla carica con una serie 
di articoli sulla programmazione del computer ZX 
Spettami, 

Lasciamo alle spalle il Basic standard, le compa¬ 
tibilità, i discorsi generici, spesso sibillini ed en¬ 
triamo nel vìvo del computer per conoscerne tutti i 
segreti e sfruttarne a pieno le possibilità. 

Scegliamo di parlare dello Spectrum per molti 
motivi, ugualmente importanti. Primo tra tutti 
l'ampia diffusione di questo computer: ne sono sta¬ 
li venduti mollissimi esemplari in tuttTtaJia. Se¬ 
cando, la convinzione che lo Spectrum resterà im¬ 
battuto a lungo per quanto riguarda il software di¬ 
sponibile: ciò lo renderà ancora competitivo 


rispetto alTavanzata dei temibili MSX o del nuovo 
QL. 

Scopo di questi articoli è: esaminare in modo 
approfondito Timer azione tra programmazione e 
hardware (due entità divise per studio, ma intrinse¬ 
camente legate), fornire nozioni ed esempi in Basic 


e linguaggio macchina, per capire come lavora il 
computer ed utilizzarne a pieno la potenza. 

Per prima cosa occupiamoci del Basic Spectrum: 
prendiamo in considerazione i comandi e le funzio¬ 
ni poco o nulla trattate dal manuale, ma che si 
prestano ad interessanti applicazioni. 

Argomento non trattato resta Fuso dei canali di 
Input/Output e dei comandi che li utilizzano. 

Bisogna sapere che lo Spectrum distingue le peri¬ 
feriche ad esso collegate: ad ognuna di esse attribui¬ 
sce un diverso canale di comunicazione. Sono con¬ 
siderate periferiche: il video, la tastiera, la stampan¬ 
te e i mìcrodrivcs. 

1 canali a disposizione sono quindici e vengono 
assegnati alle periferiche tramite il comando Open 
#. La sintassi di tale comando è la seguente: 
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10 REM _Copyright by Et* 

11 ro n i c s 2000 

20 FQR n=0 T0 6 
30 POKE 23760+ n ,3 
40 NEXT n 
50 POKE 23756,. 0 


LE PROTEZIONI 


Un sistema relativamente semplice per 
rendere impossibile l'interruzione di un 
programma Basic, si basa sulla modifica 
della variabile di sistema ERR SP (che 
determina il comportamento del compu¬ 
ter in caso di errore) infatti il BREAK è 
considerato, a lutti gli effetti, un errore, 
per cui, modificando il valore del punta¬ 
tore ERR SP, è possibile creare un pro¬ 
gramma che si autodistrugge. 

Perciò è importante proteggere il pro¬ 
gramma da errori durante il funziona¬ 
mento. tramite l'impiego di adeguate 
istruzioni di controllo. 

Le locazioni della variabile di sistema 
ERR SP sono: 23613 e 23614. 

Ponendo all'inizio di un programma le 
seguenti istruzioni: IO POKE 23613,0: 
POKE 236,14,0 

obblighiamo il computer, in caso di 
BREAK, a saltare Uno alla routine che 
parte dall'indirizzo 0. In tal modo il si¬ 
stema viene completamente rinnovalo 


come se venisse spento e riacceso il 
computer. 

L'unico difetto compare quando si uti¬ 
lizzano nel programma le istruzioni 
GOSLB, RETURN, CLEAR, RUN, 
che ripristinano il valore normale di 
ERR SP. In questo caso è meglio usare 
un altro semplice programma agente sul¬ 
lo stack del calcolatore e non influenzato 
da queste istruzioni. 

Infatti, sotto la RAM top, esistono due 
locazioni di memoria che puntano ad 
una routine di ROM (precisamente 
4867) e vengono utilizzate dallo Spec- 
trum nel momento in cui termina l'ese¬ 
cuzione di un programma, o questo viene 


interrotto. Modificando adeguatamente 
questi due indirizzi è possibile rendere 
un programma Basic inviolabile. Infatti, 
ponendo all'inizio di un programma le 
seguenti linee: 

10 LEI a = PEEK 23730+256 PEEK 
23731 

20 POKE a-2,0: PO a-3,0 
in caso di BREAK, il computer si riana¬ 
lizza dalla locazione 0. per cui il pro¬ 
gramma viene cancellato dalla memoria. 
La linea 20 può essere sostituita dalla 
seguente: 

20 POKE a-2, INT(N/256): POKE a-3, 
N-256*INT (N/256) 

N è l'indirizzo di partenza di una routi- 


OPEN #n, «$» 

dove n. compreso fra 0 e 15, è il numero del 
canale e la stringa $ il nome, o meglio, la prima 
iniziale della periferica. 

Lo Spectrum riconosce «$» per schermo, «K» per 
tastiera (keyboard), «P» per stampante (printer). 

Disponendo dclLintcrfaccia 1 e dei microdrives 
viene attivato anche «M» che sta chiaramente per 
microdrives. 

I primi quattro canali vengono assegnati, all’ac¬ 
censione, nel seguente modo: 

#0 e#l alla tastiera e parte bassa dello schermo 
(dove appaiono i messaggi di sistema); 

#2 allo schermo normalmente accessibile con il 
comando print; 

#3 alla stampante. 

In pratica è come se qualcuno desse in modo 
diretto OPEN #0, «K»:OPEN #1, «K»:OPEN #2, 
«$»:OPEN #3, «P». Ciò ci permette di usare video, 
tastiera, stampante, senza preoccuparci di dar loro 
un canale. 

Quando battiamo i comandi PRINT e LIST, i 
dati richiesti sono inviati al canale #2 assegnato allo 
schermo. Se battiamo i comandi LPR1NT e LLIST 
i dati richiesti vengono inviati al #3 utilizzato dalla 
stampante. 

I comandi Input e InkeyS non sfuggono alla stes¬ 
sa legge che li vuole legati a #0 e #1 assegnati alla 
tastiera. 

Forse non vi siete mai accorti che non vi c segna¬ 
lazione di errore quando date uno dei comandi so¬ 
pracitati seguito da #n (n = numero di un canale). 


11 computer legge o invia dati al canale specifica¬ 
to, trascurando quello solitamente sottinteso. 

Se date: 

LPRINT #2; «ELETTRONICA 2000» 
anche chi non possiede la stampante può vedere 
sullo schermo la scritta. 

Per lo Spectrum non esiste differenza tra PRINT 
e LPRINT #2, perche entrambi i comandi comuni¬ 
cano con il canale #2 dello schermo. In modo ana¬ 
logo si comportano gli altri comandi. Si presentano 
problemi solo se tentate di ottenere degli Input dal¬ 
la stampante o pazzie del genere. 

Scrivendo in modo diretto: 

PRINT #0; «SPECTRUM»:PAUSE 0 
otteniamo qualcosa di inaspettato. Non vediamo 
abbassarsi i tasti da soli, ma osserviamo la scritta 
nella parte bassa di schermo normalmente inacces¬ 
sibile. La pausa serve ad evitare che tale scritta ven¬ 
ga cancellata dal messaggio di fine esecuzione. 
Questo fatto ci permette di usare, nei programmi, le 
ultime due linee dello schermo, altrimenti inuti¬ 
lizzabili. 

Provate anche ad usare LIST #0, o più PRINT #0 
in un ciclo in modo da vedere ciò che succede. 

Le possibilità non si limitano a questo comun¬ 
que: tutti i canali, tranne #0 possono essere riasse¬ 
gnati alla periferica desiderata. 

Per esempio, se desideriamo usare lo Spectrum 
senza il televisore, possiamo assegnare il canale #2, 
a cui hanno accesso tutte le PRINT, alla stampante 
battendo: 

OPEN #2, «P» 
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ni 1 in linguaggio macchina, croata da voi. 
Qualche volta, capita di listare dei pro¬ 
grammi con la prima linea non editabile 
e neanche cancellabile. In questo caso è 
possibile inserire il nome del program¬ 
mili ore ed eventuali copyright. 

Il segreto è subito svelato: inserite il 
programma pubblicalo in queste pagine 
e date KUN. Le linee dal 2l> al 50 posso¬ 
no essere poi cancellate: rimane così so¬ 
lo il messaggio dopo la REM. 

Il Funzionamento è abbastanza semplice: 
il ciclo LOR/NEXT inserisce negli spazi 
vuoti 7 caratteri di controlla numero 8, 
che posizionano il cursore alT inìzio della 
linea, sovrapponendolo al numero ed al¬ 
la REM. 

t/a linea 50 numera con 0 la prima linea; 
perciò non è piu ed i tabi le e il vostro no¬ 
me rimane per sempre. Naturalmente è 
possili ile sostituire la stringa di ca¬ 
ratteri. 

Ricordale però di mantenere sempre 7 
spazi vuoti dopo la REM, 
tu tema di protezioni * si può anche rea- 
lizzare un listato Fantasma, non visibile, 
ma perfettamente funzionante, richie¬ 
dendo l'istruzione LISI, 

ÌYr avere tate listato editate la linea ehe 
vi interessa nascondere t 1 , lasciando il 


cursore dopo il numero di linea, premete 
in sequenza i tasti: 

CAPS-SH1KÌ SYMIÌOL-SHIIT CAP- 
S1IIFT 7ENTER 

La linea scompare misteriosamente ma, 
se provate ad utilizzare il programma, 
questo Funziona perfettamente. 

Per rendere nuovamente visibile la linea, 
editate la stessa e cancellate (con DE- 
LETE) i caratteri di controllo di INK 
inseriti in precedenza. 

Non è tutto! E possìbile persino inter¬ 
rompere un listato in ttasic, o meglio an¬ 
cora, non permetterne la visualizzazio¬ 
ne, tramite l'inserimento della lìnea: I 
REM aa 

seguila da POKE 21759,16: POKE 
23760,44 digitato di reti a mente. 

In questo modo, quando richiedete un Li¬ 
stato del programma, il computer ri¬ 
sponde con il messaggio dì errore IIN¬ 
VALI D CQLOUR. 

Infatti, dopo la REM della riga I, viene 
pokato il numero 16, corrispondente al 
carattere di controllo di INK. 

Alla posizione seguente (che deve di 
norma corrispondere al colore prescelto, 
da t) a 9) inseriamo 44 (codice di control¬ 
lo}: il computer rimane interdetto e cade 
in errore, bloccando il LIST. 



In tal modo le scritte prima visualizzate sullo 
schermo (grafica e messaggi d'errore esclusi) sono 
inviale alla stampante. 

In verità possiamo fare di meglio, ritoccando al¬ 
cune variabili di sistema non segnate sul manuale c 



destinate ad indicare al computer i canali da usare. 

Se Pokiamo (scusate l'uso di questo insolito ver¬ 
bo) alla locazione 23738 il codice del carattere 
maiuscolo «P» (80), i! cursore ed i messaggi di in- 
put ed errore appaiono su stampante. 

Provate anche a dare: 

POKE 23738.83 (CODICE DI «S») 
il cursore si porta in alto a sinistra similmente a 
quello di altri personal. 

Vi è capitato certamente di trovare cassette (ma¬ 
gari C90) zeppe di programmi senza che voi nc ri¬ 
cordiate il contenuto. Ebbene senza far uso di com¬ 


plicati lettori di header, potete listare su stampante 
l'elenco dei programmi battendo semplicemente: 

POKE 23743,80:LO AD «XXXX* 

In questo modo il computer, non trovando (se 
non nc avete inserito uno volutamente) alcun pro¬ 
gramma di nome «XXXX», scrive i nomi di tutto 
quanto incontrato, non più su video, ma su stam¬ 
pante. Questo c possibile grazie alla modifica di 
un'altra variabile, contenente V iniziale della perife¬ 
rica (solitamente lo schermo), a cui i! sistema invia 
il listato (premendo ENTER) e il nome dei pro¬ 


grammi in caricamento. 

Questo trucco è usato dalla rivista su cassetta 
Load'n'Run, allo scopo di evitare che. in carica¬ 
menti concatenati, il nome del programma guasti le 
artistiche schermate. 

Proseguiamo la trattazione con il comando 
CLOSE #n (n = canale), che chiude un flusso pre¬ 
cedentemente aperto. 

Non ha senso usarlo con i canali da #0 a #3; 
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NcH'inimagine il registratore per dati Philips, una 
buona soluzione per fare una copia del programma 
prima di introdurre qualsivoglia sistema di protezione. 


funziona invece con tutti gli altri; è necessario per 
effettuare assegnamenti successivi: 

OPEN #7; «<$»:PRINT #7; ««ALTO» 

OPEN #7:OPEN #7, «K»:PRINT #7; «BASSO»- 
•PAUSEO 

Usando CLOSE #n con n come canale già chiuso 
o mai assegnato, il computer si blocca in un tran¬ 
quillo e infinito loop, interrompibile solo staccando 
il jack di alimentazione. 

Occupiamoci ora dei caratteri di controllo. L'uso 
di questi codici nell'ambito della programmazione, 
consente di ottenere effetti particolari molto utili e, 
spesso, irraggiungibili per altre vie. 

Per prima cosa parliamo dei codici dei colori, 
normalmente accessibili da tastiera premendo in 
modo esteso (cursore = E) i tasti della prima fila. 
Con questi possiamo modificare a piacimento colo¬ 
ri, luminosità, lampeggio del testo (senza l'uso di 
PAPER, INK, BRICìHT, FLASH, INVERSE, nel¬ 
la seguente maniera: modo del cursore KoL, 

(CAPS-SHIFT) e (4) equivale a INVERSE 1; 
(CAPS-SH1FT) e (3) ad INVERSE 0. 

Modo del cursore E, 

i tasti da 0 a 7 cambiano il colore di PAPER con i 
colori corrispondenti; 

i tasti da 0 a 7 contemporaneamente a CAPS- 
SHIFT cambiano il colore dell'inchiostro (INK). 

Il tasto 9 predispone FLASH 1, mentre il tasto 8 
FLASH 0. 1 due tasti, premuti contemporaneamen¬ 
te a CAPS-SHIFT, danno BRIGHT 1 e BRIGHT 
0 . 

Un programma in cui siano usali i codici di con¬ 
trollo risulta più veloce e nel contempo maggior¬ 


mente leggibile nel listato, a patto di conoscere al¬ 
cune norme fondamentali. 

Per colorare il testo di una stringa è necessario 
posizionarsi all'inizio (subito dopo le virgolette) e 
premere i codici desiderati. Per evitare listati a stri¬ 
sce è bene ripristinare alla fine i colori originali. 

Se volete evidenziare una parte di listato, o na¬ 
sconderla ad occhi indiscreti, date, subito dopo il 
numero di linea, i caratteri di controllo desiderati 
(magari rendendo PAPER e INK uguali) e poi, al 
termine del blocco ripristinate i colori originali. 

Ricordate: non è possibile effettuare slicing di 
stringhe contenenti caratteri di controllo. Per 
esempio, se la riga PRINT «CIAO» è racchiusa in 
un loop di for/next, e contiene caratteri di control¬ 
lo, anch’essi vengono inclusi nel conteggio. 

Se usate DELETE (CAPS-SHIFT +0) per can¬ 
cellare un carattere di controllo, notate un compor¬ 
tamento strano. 

La cancellazione totale avviene solo dopo due 
successive pressioni, con una fase intermedia in cui 
appare un punto di domanda. Questo accade per¬ 
ché i caratteri di controllo dei colori sono costituiti 
da due bytes. Il primo definisce la funzione, il se¬ 
condo il numero. 

L'appendice A del manuale dello Spectrum è ab¬ 
bastanza eloquente: i caratteri tra 6 e 23 da soli (o 
seguiti da 1,2 numeri), servono per ottenere le fun¬ 
zioni di stampa. 

I caratteri più utili in fase di programmazione, 
oltre a quelli dei colori, sono: 

— 8 — (ottenibile con: CHR$ 8) che muove il 
cursore indietro di un carattere 
— 23 — carattere di controllo di TAB seguito dal 
numero di spazi. 

Battete: 

LET a$ = CHRS22 + CHRS12 + CHR$14 T 
CHRSI8 + CHR$1 + «NOME» c poi date PRINT 
a$. 

Vi appare la scritta «NOME» lampeggiante al 
centro dello schermo. 

Le informazioni necessarie alla stampa (AT 
12,10 c FLASH l) sono contenute in a$ sotto forma 
di codici di controllo. 

Se date: PRINT LEN aS vi potete rendere conto 
che tali codici esistono ed occupano uno spazio. 

Se date: 

SAVE a$ 

il computer assegna, quale nome del programma, la 
stringa precedentemente definita con annessi tutti i 
codici. 

Se provate a registrare c poi caricare, il nome del 
programma appare lampeggiante e centrato. 

Se, grazie alla completezza delle istruzioni Basic 
dello Spectrum, l’uso dei caratteri grafici può essere 
tranquillamente ignorato, coloro che programma¬ 
no in linguaggio macchina devono conoscerlo. 

Realizzare un semplice programma in linguaggio 
macchina per la stampa di frasi a vari colori c in 
varie posizioni c facile se usate la chiamata «rst 16» 
della ROM che stampa il carattere contenuto (come 
codice) nell’accumulatore. 

| continua | 
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li progetto che presentiamo è 
I Idestinato ad evitarci «ulcere 
c;j blackout »- 

Sé tratta di un circuito che può 
ulvare tutto quanto è stato digi¬ 
uno faticosamente (per riempire 
ili software la memoria dello 
Spectmm) da un blackout o da 
un disturbo di rete. Infatti, c suf¬ 
ficiente anche un disturbo di 
qualche microsecondo per di¬ 
struggere il lavoro di molte ore. 

Proprio per queste ragioni, 
quando si usa un computer per 
applicazioni professionali, è pre¬ 
feribile sempre utilizzare sistemi 
di alimentazione di sicurezza atti 
a garantire la totale protezione 
dei dati. Nelle applicazioni pro¬ 
fessionali è facile comprendere 
perché venire alla decisione di 
proteggere i dati. 


POWtfi 


ON 


EMERGENCY 

Anti Blackout 


ALIMENTATORE DI 
SICUREZZA CHE 
PERMETTE DI SALVARE 1 
DATI SU NASTRO IN CASO 
DI MANCANZA DI 
TENSIONE. 


di STEFANO BRUCINOLI 


La protezione dei dati per un 
home computer la si capisce a vo¬ 
lo se si è provato in prima perso¬ 
na a veder scomparire dallo 
schermo il fruito di ore di ragio¬ 
namenti e la fatica di una lunga 
digitazione. 

Passiamo quindi a presentare 
il progetto, considerando i detta¬ 
gli tecnici parallelamente alle 
prestazioni che esso offre. 

Su una piccola basetta sono 
raccolti i pochi componenti ne¬ 
cessari a tenere costantemente 
sotto carica il pacco batterie. 
Questo interviene ogni qualvolta, 
durante il funzionamento del 
computer, viene a mancare la 
tensione di rete. 

Il blocco batterie utilizzato 
preseli e a la capacità di alimenta¬ 
re lo Spectrum per circa un’ora. 
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ALIMENTATORE 

OUT 9V 



SINCLAIR 




220 V 


IN 9V 

220 V 




OUT 9V 





SPECTRUM 


7 


OFF ON 


I.o stabilizzatore, con batterie di emergenza, utilizza come modulo per 
ottenere tensione continua l'alimentatore Sinclair. Questo permette di avere in 
uscita una tensione stabilizzata a 9 volt, evitando il sovraccarico dello 
stabilizzatore interno del computer. 


o- 

IN 220 V 

o- 

o- 

+ 

9+35V 

IN 

Ò— 



Le batterie da utilizzare per il sistema «in tampone» debbono essere del tipo al 
Nichel-Cadmio. L'apparecchio è in grado di permettere il funzionamento dello 
Spectrum anche per un'ora. Naturalmente non può tenere attivo il televisore. Il 
salvataggio dei dati in pericolo deve essere fatto con un registratore a batterie. 








US 


•—« - *— 



Naturalmente questo tempo si 
riduce in funzione della quantità 
di periferiche direttamente colle- 
gate all’elaboratore. 11 tempo of¬ 
fertoci dal set di batterie è co¬ 
munque più che sufficiente per 
garantire un’autonomia tale da 
permettere il «salvataggio»» su 
nastro del programma già inseri¬ 
to in memoria RAM dello Spec¬ 
trum. Nel presentare il circuito 
abbiamo sinora sempre fatto ri¬ 
ferimento allo Spectrum; tuttavia 
è doveroso rimarcare che il cir¬ 
cuito si adatta perfettamente an¬ 
che allo ZX81. 

L’alimentatore di emergenza si 
avvale, per il funzionamento in 
situazione di normalità, del mo¬ 
dulo alimentatore Sinclair. 

Inoltre provvede a prestabiliz¬ 
zare la tensione fornita al com¬ 
puter da quest’ultimo. Tale fatto 
evita il notevole surriscaldamen¬ 
to dello stabilizzatore interno 
dello Spectrum. 

Normalmente potete rilevare il 
surriscaldamento semplicemente 
appoggiando il palmo della ma¬ 
no sulla parte superiore del con¬ 
tenitore che racchiude la mac¬ 
china. Il surriscaldamento degli 
Spectrum è dovuto al fatto che, 
molto spesso, la tensione di usci¬ 
ta degli alimentatori ad esso de¬ 
stinati, corrisponde a 10-12 volt. 
Osservando lo schema di connes¬ 
sione del circuito potete rilevare 
che l’uscita del Sinclair Power 
Supply viene allacciata al circui¬ 
to proposto. L’allacciamento av¬ 
viene in modo tale che lo stabi¬ 
lizzatore di tensione (Ul) prov¬ 
vede a ridurla ai 9 volt previsti 
per il corretto funzionamento 
delle Spectrum. 

Risolvere il problema del sur¬ 
riscaldamento è importantissi¬ 
mo: a molti utilizzatori è già ca¬ 
pitato di osservare pagine video 
rovinate o addirittura di vedersi 
bloccare il computer. 

L’eccessivo surriscaldamento 
può infatti portare danni irrime¬ 
diabili alla circuitazione dello 
Spectrum. 

Il funzionamento del circuito è 
semplicissimo: il blocco batterie 
c mantenuto costantemente sotto 
tensione in modo che si presenti 
perfettamente carico nel momen¬ 
to di emergenza. 

Il diodo D2 polarizza la circo- 
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COMPONENTI 


RI = 330 ohm 1/2 W 

R2 = 330 ohm 1/2 W 

DI = 1N4002 

D2 = 1N4002 

LDI = led verdi 1 

LD2 - led rosso 

U1 = 7809 

SW1 = deviatore 2 vie 2 pos, 
lì — S batterie a torcia da 
1,2 V 1,8 Ah al NI-CD 



7809 


U circuito stampato, codice 357 è di¬ 
sponibile à lire 5000. Per riceverlo è 
sufficiente farne richiesta alla nostra 
redazione con vaglia postale. 


Iazione della corrente in modo 
che. nel momento di blackout, la 
tensione della batteria non possa 
riversarsi sul terminale di uscita 
delPimegrato Uh La presenza 
del diodo D2 introduce però una 
caduta di tensione di 0,7 volt. 

Questo fallo rende troppo bas¬ 
sa fa tensione per poter assicura¬ 
re il funziona mento al computer. 
Per eliminare l'inconveniente è 
stato inserito DI fra il terminale 
2 dell'integrato e la massa* 

Durante il normale funziona¬ 
mento vengono chiusi i contatti 
del doppio interruttore SWL La 
tensione di rete viene cosi appli¬ 
cata all'alimentatore Sinclair. 

Come conseguenza il diodo led 
1 si illumina. U1 stabilizza la ten¬ 
sione che tiene in carica il blocco 
di batterie al Nichel-Cadmio; fa 
inoltre illuminare il led 2 ed assi¬ 
cura il funzionamento del com¬ 
puter. 

Quando si verifica il black-out, 
il led I si spegne c manca lensio- 
ne ad Ul; allora il set di batterie 
ricaricabili mantiene acceso il se¬ 
condo led e naturalmente lo 
Spectrum. 
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QL SOFT 

Sinclair Super Basic 

di EDWARD BAILEY 


D edichiamo spazio al tanto sospirato SIN¬ 
CLAIR QL del quale sono iniziate da poco le 
consegne ai fortunali sudditi del Regno Unito, co¬ 
me lo scrivente, che l’aveva ordinato il 14 Febbraio 
ricevendo il fatidico pacco marrone il 10 luglio. 

Innanzitutto è doveroso fare notare che non è 
arrivato il solito aggeggio con pezzi esterni penzo¬ 
lanti da fili (qui mi riferisco ai QL campione dati in 
giro a riviste specializzate), ma bensì un insieme 
ben imballato con addirittura 8 cartuccie per mi¬ 
crodrive in regalo (oltre alle 4 contenenti i pro¬ 
grammi Psion), ed un cavo di collegamento RS- 
232C anch'esso gratuito ai primi destinatari. Sem¬ 
brerebbe quasi che qualcuno si sia voluto far 
perdonare la consegna andata un po’ oltre i 28 
giorni promessi. 

Il QL è sprovvisto di interruttore di accensione 
proprio come lo Spectrum. Inserendo la spina 
compare subito la scritta: 

FI = monitor 
F2 = TV 

1983 Sinclair Research Ltd. 

Ciò è dovuto al fatto che lo schermo del QL c 
diviso in tre parti: 

2 = Listato programma 
1 = Uscita programma e grafica 
0 = Comandi e messaggi errore 


2 

1 


1&2 

0 


0 


Monitor TV 


Poiché il QL ha la possibilità di allacciamento sia 
ad un televisore che ad un monitor, le zone dello 
schermo suddette appaiono diversamente. Cioè con 
il monitor appaiono tutte e tre mentre con il televi¬ 
sore si alternano le zone 2 e 1. In poche parole 
quando scrivete il programma appare la zona 2 e 
quando eseguite il programma appare la zona 1. 
Questo è stato fatto perché i televisori per uso do¬ 
mestico non hanno una grande definizione, per cui i 
caratteri piccoli dello schermo monitor, visti alla 
TV, vi manderebbero insieme la vista in pochissimo 
tempo. 

Il nuovo linguaggio utilizzato dal QL si chiama 


SuperBasic ed è senza dubbio più potente, veloce cd 
in alcuni casi anche più facile, del Basic normale dal 
quale deriva. 

Viene spontaneo fare dei confronti con il Basic 
dello Spectrum ed in effetti, molte istruzioni, esi¬ 
stono ancora con esattamente la stessa funzione. 
Altre sono state lasciate, anche se superflue per il 
QL (ad esempio LET si può omettere). Infine, come 
era logico supporre, vi sono delle istruzioni nuove. 

Il SuperBasic ha un modo più logico di confron¬ 
tare le stringhe. Ad esempio, si possono fare i nor¬ 
mali raffronti aritmetici: 

LET amico 1$ = «CARLO» 

LET amico2$ = «GIOVANNI» 

1F amico 1$ < amico2$ THEN PRINT «CAR¬ 
LO» 

1F amico2S < amicol$ THEN PRINT «GIO¬ 
VANNI» 

La risposta sarà «CARLO» poiché in questo con¬ 
testo il simbolo < vuol dire precedente o più vicino 
alla A nell’alfabeto. 

Seguendo la stessa logica, ci si aspetterebbe di 
vedere «cario» prima di «GIOVANNI» oppure 
EGB51Z prima di EGB495Z; eppure, usando solo 
il codice interno dei caratteri, si otterrebbe il risul¬ 
tato «sbagliato» in ambedue i casi. Qui entra in 
gioco il SuperBasic con raffronti più logici, come 
dimostrato dal seguente programmino: 

10 INPUT oggetto 1$, oggetto2$ 

20 IF oggetto 1$ < oggetto2S THEN PRINT 
oggetto 1$ 

30 IF oggettol$ = oggetto2$ THEN PRINT 
«Uguali» 

40 IF oggetto 1$ > oggetto2$ THEN PRINT 
oggetto2$ 

l risultati saranno i seguenti: 
cario - giovarmi = cario 
cario - GIOVANNI = cario 
EGB51Z - EGB495Z = EGB51Z 
ABC - abe = ABC 

Abbiamo poi le variabili a numeri interi che ven¬ 
gono segnalate con il simbolo % (percentuale) c 
indicano al QL che la cifra risultate deve essere 
arrotondata al numero intero più vicino (ad es. 5.54 
= 6 e 5.38 = 5). 

11 QL, tramite il Superbasic, tenta sempre di 
aiutare il programmatore piuttosto che «sbattergli 
in faccia» un messaggio di errore. 

Vediamo ora un programma... 
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320 POR T = PI/6 TO 2SPI STEP PI/6 
330 T - T + i 

340 IF T > 12 THEN CO TO 370 

350 X = 32*SINCI> ì V = 30*CGSC T > ^ 

360 CURSORI X+35.¥+5e.0i0fpRIMT Tj ^.É 

370 END FOP I 

380 CSIZE 2 , 1 j| 

385 INK 7 ^kfP^P 

387 DRUHR PP^ 

390 IJPDI G i DRUISC * DRUHR ■ DRLJMH 
400 GO TO 390 

410 DEFi ri# PROCedur* UPDIG L__ 

420 LOC^i l T$ 

430 T* * DATE* 

440 BEEP 100,10 

450 TF T* = DATE® THEN CO TO 450 

460 HR = T*C 1-3 TO 14V m = 16 TO 17)' SE = T$< 19 

470 HR - HR + MH/60 

480 RT 9,0*PRIHT TSC12 TO 29>j 

490 BEEP 100,20 

495 RT 0,10; PRIMI 11 SIMCLRIR OL TIME" 

500 END DEF 1 rn? 

510 DEFine PROCedure DRUHR 
520 LGCal I 
530 H = -1 

540 I = 0H*PI/6 ■ DRL-JLN 1,4: j = HR*FI/S= DPWLN 1,7- 0 

550 H “ 0 

560 END DEF i'ne 

570 DEFi rie PROCedure DRWMH 

580 LOCal I 

590 I = OMJfeP 1 /30 s DRMLN I,4> I = MN*PI/30 = DR14LN 1,7: 

600 END DE Fi'ne 

610 DEFIne PROCedure DRUSE 

620 LOCai I 

630 I = OS*PI/30 ^ DRWLN 1,4= T = SE*PI/30 : DRULN I 
640 END DEFine 

650 DEF ine PROCedu.re DRWLNC I . C > 

660 LOCjl x,y 
670 INK C 

630 X = 25*SINCI): Y - 24TCGSC 1 ) 

690 IF H THEN X *= 20*SIN< O « Y = 18*C0S< I) 

700 LINE 85,50 TO X+85LY+3B 
710 END DEFine 


Il programma pubblicalo permeile ia visualizzazione, su monitor o televisore, di un orologio analogico e digitale. Non si 
tratta certamente (li una routine sorprendente ma vi inviliamo a considerarla, con attenzione, per comprendere il metodo 

di gestione delle suhroutine con il Superhasic, 




SOFTWARE 


Spectrum Minidatabase 

l. versione semplici a del programma di archivio presentato alcuni mesi la* Possibilità 
di ricerca e ordinamento per ciascuno dei tre campì disponibili. Gira su Spectrum 48 K, 



I n uno degli scorsi numeri è stato presentato un 
completo programma per memorizzare su «sche* 
de» un archivio, per esempio relativo ad una colle¬ 
zione di libri o di dischi. Poiché alle volle può risul¬ 
tare sufficiente e più semplice disporre di un simile 
«archivio» di dimensioni più ridotte (e questo lo è 
veramente al minimo, sì da meritarsi il nome di 
Mini database...), ecco una versione che si distingue 
dalla precedente anche in termini di programma¬ 
zione e di elaborazione. Ogni «record» c qui ridotto 
alla sua forma minima, per un insieme di 32 caratteri 
massimi, suddivisi in tre «campi» a cui si può al 
solito attribuire i nomi e funzioni più opportune. Per 
rimanere sul pratico, nel programma sono stati mi- 
lizzati i nomi «autore», «titolo» c «codice/editore», 
tipici ad esempio per una raccolta di libri. È ovvio 
che, con la lunghezza indicata, questi dati si 
dovranno mantenere entro pochi caratteri ciascuno, 
ma spesso ad un record « DANTE: IN FIRN O;- 


S7A 12» (dove l'ultimo dato starebbe per scaffale 7 L \ 
collocazione A 12). Naturalmente, a seconda del- 
Eim piego, si potranno cambiare in modo idoneo le 
varie denominazioni nei vari punti del programma, e 
così l'archivio potrà riferirsi a una raccolta di dischi, 
o a un piccolo magazzino, eccetera. Come illustra il 
MENU riportato accanto, sono disponibili le con¬ 
suete opzioni; definizione di un nuovo archivio; 
aggiunta o cancellazione di record; lista per T 
(autore) o 2" campo (titolo); e ricerca per IV2" o 3° 
campo: nonché ovviamente i! salvataggio dei record 
al momento presenti e il caricamento di un file di 
record da nastro. 

Illustriamo brevemente il listato del programma: 
— Righe 10-14: inizializzazione degli elementi che 
verranno trascritti su nastro, ed altri (questo al fine 
che n e FS occupino le prime posizioni nel Va rea delle 
variabili), della funzione che legge VARS: c della 
scrittura in caratteri maiuscoli. 


IL MENÙ 

#■* ELETTROMIuh 2 fl 0 0 + * 

DELEZIONI disponibili 

ì-CREAZIONE NUOVO rILS 
3-MODIFICHE A^ FILE 
3-ELENCO PER AUTORE 

*-elenco per titolo 

5- RICERCA PER AUTORE 

6- RICERCh PER TITOLO 

7- RICERCA PER EDITORE/CODICE 

§“PEDIoTR:HZ IuNE FILE EU NhìTRu 
y-cRftlCAMENTO FlLL DA NASTRO 
0-ST QP 


N6 UNA COLTA INTRODOTTI DEI DATI 
MhI DARE RUM' MA GOTO EO 


IL PROGRAMMA 


01 


im REM MINIDATABA5E £000 

11 LET n =0 ; DIM F*(300,32): 

M 1300,3*) : DIM E % (300,32) 

12 POKE 23b53.8 

==Ì 3 „5? F FN v()=PEEK 23527+ 256*P 
EEK 23623 

14- GO TQ 5© 

15 FOR K. =Nfl TQ N-i: LET F$(K) = 
F*(K+l). NEXT K: LET N*N-1; RETU 
RN 

16 FOR K=NT Tu N: LET E*(K»=Et 
(K+l); NEXT K: RETURN 

17 FOR K.=Nh TO N : LET G$(K)=G$ 
( K, + 1 j . NEXT K ; RETURN 

13 PRINT Hi; -PREMI UN TASTO PE 
R IL MENU ": PAUSE 0: GO TQ 50 

20 REM SR RICERCA TITOLO 
22 INPUT -INTRODURRE IL TITOLO 
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— righe 15-16-17: routine di aggiornamento dei vet¬ 
tori a seguito cancellazione di un record del file. 

— riga 18: routine di rinvio al menu. 

— righe 20-30: routine ricerca per titolo (= 2 " 
campo). 

— righe 35-44: routine ricerca per autore (= 1" 
campo). 

— righe 50-70 routine selezione opzione e rinvio alla 
relativa sezione di programma. 

— righe 80-90: routine per codice (= 3° campo). 

— righe 100-190: routine di ordinamento («sort») 
con metodo Shell-Metzner (per i tre tipi di «strin¬ 
ghe» ricavate dai record ordinando i tre campi in 
modo diverso secondo gli scopi). 

— righe 200-270: sezione «prima creazione del file»: 
utilizzata anche in parte dalla sezione «aggiunte di 


nuovi record». I contenuti dei tre campi ( A8-T8-CS) 
vengono combinati opportunamente per dare tre 
stringhe che vengono poi ordinate al termine dell’in¬ 
troduzione dei dati (segnalato dall’impostazione di 
«Z» al posto del contenuto 1° campo). 

— righe 400-510: sezione «modifiche del file», 
distinte in «aggiunta nuovi record» (500-510) c 
«cancellazione di I record» (righe 450-480). 

— righe 600-660: sezione «elenco per autore» (= 1° 
campo). 

— righe 800-840: sezione «elenco per titolo» (= 2° 
campo). 

La ricerca avviene, per semplicità, in ordine 
sequenziale. Quando viene rintracciato il record, ne 
viene stampato il contenuto completo; e. per como¬ 
dità, anche quello dei record che seguono. 


: " ' N $ 

24. FOR M = 1 TO N 

26 IF E$(M)( TO LEN Nfc)=N$ THE 
N RETURN 
28 NE \T N 

30 PRINT ai. BRIGHT l; M NON HO 
TRCUATO IL TITOLO"; PAUSE 400: G 
0 T 0 50 

35 REM SR RICERCHI PER hUTORE 

36 INPUT "INTRODURRE L'AUTORE 

: " 'N$ 

38 FOR M=1 TO N 

40 IF F $ (N) ( TO LEN N$'=N$ THE 
N RETURN 
42 NEXT M 


133 LET U$=G$(Z): LET G$iZ)=G$i 
B.' : LET G$ « 6) = U$ 

140 LET 0$=F$i.Z): LET F$(Z)=F$( 
B): LET F$iB)=Q$: G0 TO 135 
145 LET G=N: LET B=0 
150 LET 2*1 

155 LET B = Z +1: IF B >G THEN LET 
G =G-1: IF G >0 THEN GO TO 150 
160 IF G=0 THEN CLS : RETURN 
170 IF E$‘B)<E$tZ> THEN GO TO 1 
60 

175 LET Z =Z +1: GO TO 155 
180 LET O$ = E $ ( Z ) 

185 LET E* (Z) = E$(B) 

190 LET E$'.B:«=0$ 


44 PRINT ai, BRIGHT 1;"NON HO 
TROUATù L'AUTORE": PRU5E 400: GO 
TO SO 

50 CL5 : PRINT TRB 2:"** ELETT 

RONICA 2 0 0 0 *♦.SELEZIONI 

DISPONIBILI 

52 PRINT '"1-CRERZIONE NUOUO F 
ILE" 

54 PRINT "2-MÙOIFICHE RL FILE" 
56 PRINT "3-ELENCO PER AUTORE" 

53 RRINT "4-Elenco PER TITOLO" 
60 PRINT "5-RICERCR PER ROTORE 

.6-RICERCA PER TITOLO.7-RICE 

RCR PER EDITORE/CODICE" 

62 PRINT "S-REGISTRRZIONE FILE 
SU NASTRO"'"9-CARICAMENTÙ FILE 
Dh NASTRO"'"0-STOP" 

64 PRINT .NBiUNR UÙLTR INTR 

ODOTTI DEI DRTI MRI DRPE 'RUN 
l\R -GOTO 50'" 

66 INPUT R: CLS : IF R>9 THEN 
BEEP .1,15: GO TO 50 
68 IF R=0 THEN STOP 
70 GO TO 200*A 

30 REM SR RICERCR PER CODICE 
82 INPUT "INTRODUCI IL CODICE: 
"; N $ 

64 FOR Usi TO N 

66 IF G$(M « ( TO LEN N$) aNS THE 
N RETURN 
38 NEXT M 

90 PRINT ai. BRIGHT l."NON HO 
TROURTO IL CODICE": PROSE 400 G 
0 TO 50 

100 REM SR DI uRDINRMENT0 
105 LET G=N LET 6=0 
110 LET Z=i 
115 LET 6=Z+1 
120 IF 6 >G THEN LET G=G-1 
>0 THEN GO TO 110 
125 IF G =0 THEN GO Tu 145 
130 IF F $ • B) <F $ <Z) THEN Gì 
40 

135 LET Z =Z + 1 : GO TO 115 


195 

200 

210 


GO TO 175 

REM CRERZIONE DI UN FILE 
LET J = 1 : LET M$ = "" 

215 CLS : PRINT RT 0,0," RL t€.' 
(Mine introduzione RECORD, ìfopo 

stare z = £>t o p ! 

220 PRINT RT 7,4 i "Nuifte i *0 pr09i*« 
ss ivo ", flRSh i; j' 

225 INPUT "INRODURRE L AUTORE " 

‘ A $ IF R$ = "Z" THEN GO TO 270 
230 PRINT A$ INPUT "INTRODURRE 
IL TITOLO "'Ti: PRINT T$ 

235 INPUT "INTRODURRE EDITORE/ 
CODICE "'Ci: PRINT C$ 

240 INPUT "SE TUTTO E CORRETTO 
,PREMI ENTER" "ALTRIMENTI PREMI 
UN QUALSIASI RLTRO rRSTO S« 9 U 
ito da ENTER ".B $ : IF 6$<>"" ThE 
N GO TO 215 

IF M$="C" THEN RETURN 


245 

250 

255 

260 

265 

15 

270 


LET 

LET 

LET 

LET 


Fi Cd) =A$ + 
Et i J) =T$ + 
G % (d) =C $ ♦ 


" +T $ + " 

"+H$+" 
+ H$ ♦ 


N=-J. LET J=J+1: GO 


+ C$ 

“ +Ct 
’+Tt 
TO 2 


10,5, 


FLRSH 
GO SU 


l n | ppTMT ÙT 

1,"ORDINAMENTO IN CORSO! 

B 100: GO Tu 50 
400 REM MODIFICHE RL FILE 
410 CLS : INPUT "AGGIUNTA 0 CRN 
CELLAZIONE?";M$ 

420 IF M$ < >"A" AND M$<>"C" THEN 
GO TO 410 

430 IF M$="A" THEN GO TO 
450 REM CANCELLAZIONE 
455 GO SUB 225 


50O 



460 

LET N $ =R i : 

GO 

SUB 

o o . 

LET 

N 

IF G 

h=M : 
HEN 

IF GitNA)I 
GO SUB 90 

TO 

LEN 

C$i 

< > C $ 

T 

TO 1 

465 

Tali 

LET N$=T $ 

GO 

SUB 

c:4 

LET 

N 

475 
B 17 

GO SUB 15 

GO 

SUB 

16 

GO 

SU 
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- righe 1000/1030, 1200/1230, 1400/1470: sono le 
ire sezioni dì «ricerca» di un record, rispettivamente 
in base ai contenuto del V\ 2° o 3° campo (anche 
abbreviato). Se il record non viene rintracciato, 
viene segnalato. 

— righe 1600-1630: sezione «salvataggio del file» su 
nastro* Il file viene salvato come byte, limitandosi 
alla parte «viva» del vettore FK ed al valore di n, 
numero dei record. 

Si ricordi che, dopo il primo RUN (in assenza d'un 
file), ogni eventuale ritorno al menù (dopo un even¬ 
tuale BREAK, sempre possibile tranne in fase di 
INPUT) va effettuato in ogni caso con GO TO 50, 
per evitare dì distruggere il file presente in memoria. 


4 SO 
50O 
510 
600 
620 
630 
640 
650 
660 
600 
605 
610 
620 
830 
640 
1000 
1010 
1020 
1030 
0 

1200 

1210 

1220 

1230 

0 


GO Tu 50 

REM AGGIUNTA DI 1 RECORD 
LET J = N +1 ; GO Tu 216 
REM LISTA PER AUTORE 
LET u = 1 
FQR MsU TO N 
PRINT F$lM) 

NEXT M 
GO TG 18 

REM ELENCO PER TITOLO 
LET U-l 
POR N=U TO N 
PRINT EiiM) 

NEXT M 
GO TG 18 

REM RICERCA PER AUTORE 
GO SUB 35 
PRINT F $ ih) 

PRINT : LET U=M+1e GO TG 63 


REM RICERCR PER TITOLO 
GO SUB 20 
PRINT E% t N ) 

PRINT : LET UsM+1; GG TG 61 


1400 REM RICERCA 
1410 GQ 5U6 80 
1460 PRINT G%{Mi 
1470 GO TG 16 
1600 REM SftUE DI 
1610 CLS : INPUT 
N$ 


PER CODICE 


UN FILE 

‘NOME DEL FILE 7 


V ( } 


14 + N ù '^ì. 


1620 5AUE N % CODE FN 
1630 GO Tu 50 
1600 REM LOAD DI UN FILE 
1810 CLS ; CLEhR : lET N=G: DIM 
F % i, 300 f 32) : DIM E$ < 300,32): DIM 
** 0300,32' : LET 1 = 0: LÈT K=0: LE 
L=0: INPUT 'NOME DEL FILE 7 ".N 


METTI IN NOTO II 
PREMI UN TR 


:ls 


$ 

1620 PRINT RI 
NASTRO E POI 
STO 11 

1330 PAUSE G 
FN Vii 

1335 CLS ; PRINT AT 
1,; '■ATTENDI! " 

1640 FQR 1 = 1 TO N: POR K=1 TO 32 
IF FM) (KìO"; M THEN NEXT K 
ISSO FÙR L = K +1 TO 32: IF Filli i'L 
'O tl : n THEN NEXT L 


t*- CAD N $ CODE 
10 .i 10 } FLASH 


1655 

li < >** 

1360 




FÙR R=L +1 TO 
" THEN NEXT R 
LET G* i I) sF* li) 


+ “ : " rF* u.) i, TO L-i.i : 
$ i I) (K + l T0 L ) +F4 11) 
ML + 1 TO R-l) : NEXT 
13?0 '30 oU6 14-5 
1890 G0 TO 50 


: IF Fìlli (R 

tL + 1 TO R-l) 
LET ES 1.1) =F 
TO K) +F$ ( I 
I 


